﻿''' <summary>
''' 工程信息类
''' </summary>
''' <remarks></remarks>
<Serializable()> _
Public Class ProjectItem
    ''' <summary>
    ''' 构造函数
    ''' </summary>
    ''' <remarks></remarks>
    Public Sub New()
        _imageList = New List(Of ProjectImageItem)
        _DevTypeGroupList = New List(Of DevTypeItem)
        _DictoryItem = New ProjectDictoryItem()
        _projectID = Guid.NewGuid().ToString()
        _projectName = ""
        _remark = ""
        _listNo = 1
        _Phone = ""
        _COMNumber = 0
        _connectType = -1
        _DevCount = 0
        _RefCount = 0
    End Sub


    Private _projectID As String
    Public Property ProjectID() As String
        Get
            Return _projectID
        End Get
        Set(ByVal value As String)
            _projectID = value
        End Set
    End Property


    Private _projectName As String
    Public Property ProjectName() As String
        Get
            Return _projectName
        End Get
        Set(ByVal value As String)
            _projectName = value
        End Set
    End Property

    Private _projectType As Integer '设备类型(1:冷库; 2:移动车载; 3:小批零)
    Public Property ProjectType() As Integer
        Get
            Return _projectType
        End Get
        Set(ByVal value As Integer)
            _projectType = value
        End Set
    End Property

    Private _projectMacID As String
    Public Property ProjectMacID() As String
        Get
            Return _projectMacID
        End Get
        Set(ByVal value As String)
            _projectMacID = value
        End Set
    End Property

    Private _remark As String
    Public Property Remark() As String
        Get
            Return _remark
        End Get
        Set(ByVal value As String)
            _remark = value
        End Set
    End Property


    Private _listNo As Integer
    Public Property listNo() As Integer
        Get
            Return _listNo
        End Get
        Set(ByVal value As Integer)
            _listNo = value
        End Set
    End Property


    Private _Phone As String
    Public Property Phone() As String
        Get
            Return _Phone
        End Get
        Set(ByVal value As String)
            _Phone = value
        End Set
    End Property


    Private _COMNumber As Integer
    Public Property ComNumber() As Integer
        Get
            Return _COMNumber
        End Get
        Set(ByVal value As Integer)
            _COMNumber = value
        End Set
    End Property


    Private _AuthCode As String
    Public Property AuthCode() As String
        Get
            Return _AuthCode
        End Get
        Set(ByVal value As String)
            _AuthCode = value
        End Set
    End Property


    Private _connectType As Integer
    Public Property ConnectType() As Integer
        Get
            Return _connectType
        End Get
        Set(ByVal value As Integer)
            _connectType = value
        End Set
    End Property



    Private _DevCount As Integer  '控制器设备数量
    Public Property DevCount() As Integer
        Get
            Return _DevCount
        End Get
        Set(ByVal value As Integer)
            _DevCount = value
        End Set
    End Property


    Private _RefCount As Integer  '冷库数量
    Public Property RefCount() As Integer
        Get
            Return _RefCount
        End Get
        Set(ByVal value As Integer)
            _RefCount = value
        End Set
    End Property

    Private _imageList As IList(Of ProjectImageItem)
    Public Property imageList() As IList(Of ProjectImageItem)
        Get
            Return _imageList
        End Get
        Set(ByVal value As IList(Of ProjectImageItem))
            _imageList = value
        End Set
    End Property

    Private _DevTypeGroupList As IList(Of DevTypeItem)
    Public Property DevTypeGroupList() As IList(Of DevTypeItem)
        Get
            Return _DevTypeGroupList
        End Get
        Set(ByVal value As IList(Of DevTypeItem))
            _DevTypeGroupList = value
        End Set
    End Property

    Private _DictoryItem As ProjectDictoryItem
    Public Property DictoryItem() As ProjectDictoryItem
        Get
            Return _DictoryItem
        End Get
        Set(ByVal value As ProjectDictoryItem)
            _DictoryItem = value
        End Set
    End Property

    <NonSerialized()> _
    Private _LocalRunStatus As LocalRunStatus = 1 '运行状态 (1:停止; 2:启动)
    Public Property LocalRunStatus() As LocalRunStatus
        Get
            Return _LocalRunStatus
        End Get
        Set(ByVal value As LocalRunStatus)
            _LocalRunStatus = value
        End Set
    End Property

    <NonSerialized()> _
    Private _IsRemoteOnline As Boolean '是否远程连接
    Public Property IsRemoteOnline() As Boolean
        Get
            Return _IsRemoteOnline
        End Get
        Set(ByVal value As Boolean)
            _IsRemoteOnline = value
        End Set
    End Property

    <NonSerialized()> _
    Private _IsLocalOnline As Boolean '是否本地连接
    Public Property IsLocalOnline() As Boolean
        Get
            Return _IsLocalOnline
        End Get
        Set(ByVal value As Boolean)
            _IsLocalOnline = value
        End Set
    End Property

End Class
